object frmToolBarSetup2: TfrmToolBarSetup2 Left = 155 Top = 187 BorderStyle = bsDialog Caption = 'ToolBar Setup' ClientHeight = 238 ClientWidth = 548 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnDragOver = FormDragOver OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 192 Top = 192 Width = 76 Height = 13 Caption = 'Caption Option :' end object Label2: TLabel Left = 192 Top = 216 Width = 61 Height = 13 Caption = 'Icon Option :' end object Label3: TLabel Left = 8 Top = 8 Width = 104 Height = 13 Caption = 'Available ToolButton :' end object Label4: TLabel Left = 280 Top = 8 Width = 103 Height = 13 Caption = 'Selected ToolButton :' OnDragOver = Label4DragOver end object ImgInsert: TImage Left = 264 Top = 24 Width = 16 Height = 17 Picture.Data = {} Transparent = True Visible = False end object btnAdd: TButton Left = 192 Top = 64 Width = 75 Height = 25 Caption = '&Add ->' TabOrder = 0 OnClick = btnAddClick end object btnRemove: TButton Left = 192 Top = 104 Width = 75 Height = 25 Caption = '<- &Remove' TabOrder = 1 OnClick = btnRemoveClick end object cbCaption: TComboBox Left = 280 Top = 184 Width = 177 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 2 OnChange = cbCaptionChange Items.Strings = ( 'Show all captions at the bottom' 'Show some captions at the right' 'No captions') end object cbIcon: TComboBox Left = 280 Top = 208 Width = 177 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 3 OnChange = cbIconChange Items.Strings = ( 'Large Icon' 'Small Icon') end object btnClose: TButton Left = 464 Top = 24 Width = 75 Height = 25 Cancel = True Caption = '&Close' ModalResult = 2 TabOrder = 4 OnClick = btnCloseClick end object btnReset: TButton Left = 464 Top = 56 Width = 75 Height = 25 Caption = 'R&eset' TabOrder = 5 OnClick = btnResetClick end object btnMoveUp: TButton Left = 464 Top = 120 Width = 75 Height = 25 Caption = 'Move &up' TabOrder = 6 OnClick = btnMoveUpClick end object btnMoveDown: TButton Left = 464 Top = 152 Width = 75 Height = 25 Caption = 'Move &down' TabOrder = 7 OnClick = btnMoveDownClick end object btnNew: TButton Left = 16 Top = 184 Width = 75 Height = 25 Caption = '&New Button' TabOrder = 8 OnClick = btnNewClick end object btnDelete: TButton Left = 104 Top = 184 Width = 75 Height = 25 Caption = '&Delete Button' TabOrder = 9 OnClick = btnDeleteClick end object lbRemain: TZListBox Left = 8 Top = 24 Width = 177 Height = 153 DragMode = dmAutomatic ItemHeight = 22 PopupMenu = PM_Remain Style = lbOwnerDrawFixed TabOrder = 10 OnDblClick = lbRemainDblClick OnDrawItem = lbRemainDrawItem OnEndDrag = lbRemainEndDrag OnEnter = lbRemainEnter OnChange = lbRemainChange end object lbSelected: TZListBox Left = 280 Top = 24 Width = 177 Height = 153 DragMode = dmAutomatic ItemHeight = 13 Style = lbOwnerDrawFixed TabOrder = 11 OnDblClick = lbSelectedDblClick OnDragDrop = lbSelectedDragDrop OnDragOver = lbSelectedDragOver OnDrawItem = lbRemainDrawItem OnEndDrag = lbSelectedEndDrag OnEnter = lbRemainEnter OnStartDrag = lbSelectedStartDrag OnChange = lbRemainChange end object cbGrayed: TCheckBox Left = 464 Top = 184 Width = 73 Height = 17 Caption = 'Gray' Checked = True Enabled = False State = cbChecked TabOrder = 12 OnClick = cbGrayedClick end object PM_Remain: TPopupMenu Left = 88 Top = 88 object PI_Add: TMenuItem Caption = 'Add Button' OnClick = btnNewClick end object PI_Delete: TMenuItem Caption = 'Delete Button' OnClick = btnDeleteClick end end object Language: TLanguage LangCenter = DM_Language.LangCenter ResStrings.Strings = ( '0001=Separator') Left = 200 Top = 24 end end